﻿
#If NOTFINISHED Then
Public Class channelDS
    Public title As String
    Public link As String
    Public description As String
    Public language As String
    Public copyright As String
    Public managingEditor As String
    Public webMaster As String
    Public pubDate As DateTime
    Public lastBuildDate As DateTime
    Public category As String
    Public generator As String
    Public docs As String
    Public cloud As cloudDS
    Public ttl As Int32
    Public image As imageDS
    Public rating As String
    Public textInput As String
    Public skipHours As Int32
    Public skipDays As Int32

    Public Sub New()
        title = Nothing
        link = Nothing
        description = Nothing
        language = Nothing
        copyright = Nothing
        managingEditor = Nothing
        webMaster = Nothing
        pubDate = Now
        lastBuildDate = Now
        category = Nothing
        generator = Nothing
        docs = Nothing
        cloud = Nothing
        ttl = 0
        image = Nothing
        rating = Nothing
        textInput = Nothing
        skipHours = 0
        skipDays = 0
    End Sub
End Class
#End If
